﻿Imports System

Namespace System.Workflow.ComponentModel.Design
    Friend NotInheritable Class PrimarySelectionGlyph
        Inherits SelectionGlyph
        ' Properties
        Friend Shared ReadOnly Property [Default] As PrimarySelectionGlyph
            Get
                If (PrimarySelectionGlyph.defaultPrimarySelectionGlyph Is Nothing) Then
                    PrimarySelectionGlyph.defaultPrimarySelectionGlyph = New PrimarySelectionGlyph
                End If
                Return PrimarySelectionGlyph.defaultPrimarySelectionGlyph
            End Get
        End Property

        Public Overrides ReadOnly Property IsPrimarySelection As Boolean
            Get
                Return True
            End Get
        End Property


        ' Fields
        Private Shared defaultPrimarySelectionGlyph As PrimarySelectionGlyph
    End Class
End Namespace

